00041 REQUIRE "PLAY.REL" LOAD_MODULE; 00042 ⊂ REQUIRE "TVRLIB.REL[X,ALS]" LIBRARY; 00043 REQUIRE "IO.REL[X,ALS]" LIBRARY; 00044 REQUIRE "SUIO.REL[X,ALS]" LIBRARY; 00046 EXTERNAL FORTRAN PROCEDURE FMAIN; 00047 01395 IF(READ="S")∨(READ="s") THEN BEGIN 01397 START_CODE MOVEI 0,0; '047000400015; END; ⊂ FMAIN; END;